UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU UUU  VVV VVV 1171111 RRR RRR 000 000 MMMMMM = =6>MMMMMM 
UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM = 6MMMMMM 

UUU UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM ~=6MMMMMM 
UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM MMM 
UU VVV VVV 111 RRR RRR 000 000 MMM MMM = MMM 

UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM = =6MMM 
UU VV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU  ~VVV VVV 111 RRR = RRR 000 000 MMM MMM 
UUU UUU  VVV VVV 111 RRR = =RRR 000 000 MMM MMM 
UUU UUU 111 RRR = RRR 000 000 MMM MMM 
UUU UUU vVvvV VV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvVsOVVV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvV OV 111 RRR RRR 000 000 MMM MMM 
UU 1911711711 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117171111 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117111111 RRR RRR 000000000 MMM MMM 
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**FILE**1D**PQBTORIVR 
PPPPPPPP QQQQQQ BBBBBBBB TTTTTTTTTT DDDDDDDD RRRRRRRR IIIIII VV VV RRRRRRRR 
PPPPPPPP QQQQQQ BBBBBBBB TTTTTTTTTT DDDDDDDD RRRRRRRR HII! VV VV RRRRRRRR 
PP PP QQ QQ BB TT DD DD RR RR I] VV VV RR RR 
PP PP QQ BB BB TT DD DD RR RR I] VV VV RR RR 
PP PP QQ QQ 6B 88 TT DD DD RR RR I] VV VV RR RR 
PP PP QQ QQ BB BB TT DD DD RR RR I] VV VV RR RR 
PPPPPPPP QQ QQ BBBBBBBB TT DD DD RRRRRRRR I] VV VV RRRRRRRR 
PPPPPPPP QQ QQ B88BBB8B TT DD DD RRRRRRRR I] VV VV RRRRRRRR 
PP QQ QQ QQ BB BB TT DD DD RR RR I] VV VV RR RR 
PP QQ QQ QQ BB BB TT DD DD RR RR I] VV VV RR RR 
PP QQ QQ BB BB TT DD DD RR RR I] VV V\ RR RR cece 
PP QQ QQ 8B BB TT DD DD RR RR I] VW VA RR RR cece 
PP QQ0Q QQ 88888888 TT DDDDDDDD RR RR III] VV RR RR cece 
PP QQQ0Q QQ 88888868 TT DDDDDDDD RR RR HII! VV RR RR cose 
LL IIIIII SSSSSSSS 
LL III! SSSSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] Ss 
LLLLLLLLLL IIIII] SSSSSSSS 
LLLLLLLLLL HII! SSSSSSSS 


= 


pas rontye 

Table of contents 
‘¢ 70 
(3) 144 
(4) 373 
(5) 489 


- QRDX BOOT DRIVER 


DECLARATIONS 

QRDX Bootstrap device initialization 
QRDX Bootstrap device Q10 

QRDX Bootstrap device disconnect 
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16-DEC-1 BOOUV1SWT.MAR; (1) 
98080001 poor -UVI_SWITCH = 1 ; Build Micro-VAX I bootstrap emulator 
Ate NLIST CND ae 
wT Lf PQ mae = QRDX BOOT DRIVER 
IDENT ' 


SRA ARETE RAKE RETA AE AAA AAAAAAAAAAAERAAAARERAAEAAAAAEEAAERERARARARAAEAEAAEEe 


COPYRIGHT (c) 1978, 1980, 1982 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


S SOFTWARE 3 FURNISHED UNDER A LICENSE AND MAY BE USED AND og ht 
Y IN ACCORDANCE WITH THE TERMS OF SUCH biccase AND WITH THE 
LUSION OF THe ABOVE COPYRIGHT NOTICE. THIS SOFT WARE OR ANY OTHER 
IES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
ER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


® ® 
® ® 
® ® 
* ® 
w ® 
** *® 
® * 
® ® 
® ® 
® & 
:* TRANSFERRED. * 
we ® 
*® & 
*® ® 
® ® 
** ” 
** ® 
**® ® 
** *® 
** ® 
*® * 


SOC OCCOOCS OOOO OOOoOOoOO 


OOooooococooo 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eeRPORAT ite NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


LARA RARRARAARARALAARLALALALESELELASESELASESELASE ASSES EEE REE R SRR RR RRR RR ELS SO 


Conditionalize assembly to butld. a driver fer" the 
QRDX controler. 


v03-004 KOM0059 Kathleen D. Morse 13-Jul-1983 
Replace time-wait loops that use * TPR TODR oiyh the 
new TIMEDWAIT macro. 


v03-003 RTASO64 Kerbey T. Altmann 03-Jul-1983 
ix page boundary pro Lem. 


DOONAN NI SO OCSONAU EWN SO OOONOAU EWN 0 ODN UE WR 0 OO NOUS WR OOOO — ro — 


AUN BE EE EEE BWW nononononononononong 3 2 


p++ 

6 : FACILITY: BOOTS 

0 : ABSTRACT: 

0 : This module contains the bootstrap device driver for the 

8 3 UDA 50 disks. 

9 : ENVIRONMENT: IPL 31, kernel mode, code must be PIC 

0 ; AUTHOR: Kerbey T. Altmann, CREATION DATE: 20-Nov-1981 

0 : MODIFIED BY: 

§ : v03-006 pevee ie Kathleen D. Morse 23-Aug-1983 

3 3 Added $BQODEF for use by new version of TIMEDWAIT macro. 
: V03-005 KDmM0072 Kathleen D. Morse 18-Aug-1983 
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yO8-006 g a Be et — d) 
v03-002 KTA3059 Kerbey T. Altmann 23-Jun-1983 


-JUL-1984 1 PUBTDRIVR.MAR; 
ee | 
8 ; Add support for the boot device name. 
0 


0 0 65 : v03-001 KTA3007 bey T. Altmann 09-0 t-1982 
Py n 
000 3 
0 : 


Fix problem with” sett g VMBSV_S 


Qvs 
vi. 


#8 VR 


58 45 2E 52 45 56 49 52 44 55 44 


0 
4 
0 
58 45 2E 52 45 56 49 52 44 55 50 9 
0 
4 


= QRDX BOOT DRIVER 
DECLARATIONS 


@ 


Oo 
m 
CDOOOCOOOSOOSOOOOOOOOOSoOO 


OOOOCOCSCOSOOSSOSSOSOSOSSOSOSOSOSOSOSOSOSOOSOSOSO OOOO OOOOOOOOSO OOOO 
SOOO SCOCSOOSSOSOSOOSOSOOSOSOSOSOSOOSOOSOOOSOOSOSOOOOOSOOOO 


COOOCVOOOSOCOCSOOCCOOCOSOO OOOO OOOOOOOOOOOOOOOOO 


MMMMOOODOD9OCOO000O0000 0000909000909 090909098 SI INNINGS 


MEAN DD OOONA UNE WN OD NAME WIN NIA NE WWI SO OD NOU EWN 0 OONOU SWI" 


— 2) oS SS = 4 SF SS SS 


—S—-GDoCoooooooooooo 
PU OTT ONMOOOCOOOOSCSoSooO 


SOooooooofo 


C 
C 
55 44 138 DE 


136 PRTDRVNARME : 


Prsue= 1986 19:54 


-SBTTL DECLARATIONS 


: INCLUDE FILES: 


ADEF 
SVMBARGDEF 


: EQUATED SYMBOLS: 


UDAIP =9Q 
UDASA = 2 

GO = 1 
OWN = 1015 
$1 = 11 
$4 = 14 


: OWN STORAGE: 


: Boot driver table entry 


$BOOT_DRIVER 


Sete Se Ge Ge Ge Ge Ge Se Ge Ge Ge 


DEVTYPE = BTDSK_UDA,- 


sare = UD_DRVSIZ,- 


ADDR = ST 
ENTRY = UD_DRIVER 

UNIT_INIT = UD_INI 
UNIT“DISC = UD~DIS 
DRIVRNAME = DSRDRV 
AUXDRNAME = PRTDRV 
DEVNAME = DEVNAME 


START: 
DSKDRVNAME : 


»ASCIC /DUDRIVER.EXE/ 


-ASCIC /PUDRIVER.EXE/ 


VNAME:.ASCII /DU/ 


:32 VAX/VMS Macro 04-00 
:49 PUBTDRIVR.MAR; 


Boot qio offset definitions 
Boot device types 

1/0 function codes 

MSCP definitions 
Processor registers 

page table entries 

RPS offsets 

Status codes 
UBA_definitions 

11/750 UBA definitions 
Virtual addresses 

VMB argument List offsets 


Device type (QRDX) 
Driver size 
Driver starting address 
Driver entry point 
Driver unit init entry 
C,- Driver disconnect entry 
NAME,-'; Driver disk name 
NAME,- ; Driver port name 
; Boot device name 


ww 
Se 4 


Disk class driver filename 


; Port driver filename 


Boot device name 


6 12 
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RO - status code 


1¢ -SBTTL QRDX Bootstrap device initialization 
j++ 
Inputs: 
: RI ==> RPB 
: AP --> VMB argument List 
; Outputs: 


UD_INIT: 
-ENABLE LSB 
O1FC -WORD “M<R2,R3,R4,R5,R6,R7,R8> 
50 38 OB MFPR #PRS$_MAPEN, RO : Get the mapping status 
0B 50 =Co#EB : BLBS RO,10$ s if virtual ship some set up 
: Set up the SYSTEMID for the local UDA. 


MOVL RPBSL_IOVEC(R9) ,R1 ; Point to iovec 

CLRB B*<BOU$SGB_UMR DP=BOOSAL_VECTOR>(R1) ; Set for Direct Data Path 
ASSUME VMB$V_LOAD SCS EQ 0 

MOVL #1, VMBSL_FCAGS (AP) ; Set a flag to load SCS code 


: Set up an interrupt vector. 


OOOO OCOSOOCOCOCOSCOCOC COO OCOOCOO OOOO OOOOOOOOOOOOoOOO 
AOU DW NOW WOM SWF FFM DW WL LFF SMM OAOOOOOOOOAMOMOAOOO 


“i 

= 

io 

oO 
CODOoOOCOOCSCOOOSOSOOSOOOOOOOOSOOOOOOOoO 


FOO NAMEN 0 DOONAN WIN 9 EWN ON $ O ODNOA UE WWIN 0 OONOUE WI OUOONG & 
. . 


AAA PPIPINININININD 33830 SII IPA AA AAA AAA MMIII 


POR GROPP ROR OR OROPORORONOPONONOPONONNUNONIIIINN 2 4 2 ss es 


1E Ad 1FC 8F BO 10s: MOVW #<127%4>,RPBSW_ROUBVEC(R9) ; Use the highest possible 
57 54 A940 00 MOVL RPBSL_CSRPHY(R9)CROJ,R? ; Get correct address of device CSR 
52 150°CF 9E MOVA w*l L,R 3; Get the address of the init table 
02 A2 52 FFOO00000 8F CB BICL #°C<°KNFFEFFED,R2,2(R2) :; Start address of init table into tbl 
3; transfer only 24 bits 
1250 €9 BLBC RO,15$ If clr, then physical address 
51 52 15 09 EF EXTZV #VASV_VPN,AVASS_VPN,R2.R1 ; Convert VA to virtual page number 
51 50 8941 D9 MOVL §$@RPBSC_SVASPT(RO)CRIJ,R1 ; Get the physical page number 
02 a2 15 O9 2 Y is Ri #VASV_VPN, AVA$S_VPN,2(R2) ; Set physical address of init tbl 
24 AC 57 ~~ FFFCOOOO $F cB 15$: BICL3 #*C<*X3FFFFD>,R7,- ; Low 18 bits is CSR of boot device 
6 VMB$B_SYSTEMID(AP) : 
28 AC 8000 8F 8 MOVW 8s #*x VMB$B SYSTEMID+GCAP) ; 
Ae i9" C $f 20$: ADDL2 S*#<RING-INTTBL>,2(R2) ; pinatly get real phys adr of ring 
02 A 8 MOVW DASA(R7) ,R8 3; Controller online? 
06 1 74 BNEQ : Br if no, initialize controller 
908. 3 4 BSBW a! CONTROLLER CHARS ; Set gontre) lor characteristics 
7 E 7 BLBS RO,40$ : continue if success 
4s 218: : If failure, re init once 
7¢ 3; Now go thru the ridiculously complicated startup sequence. This is a 
4s : fugue in four parts. 
58 02 0 7¢ MOVL #2,R8 ; Make two tries at this 
53 O150°CF 9 OO7F RETRY: MOVAB W*INTTBL, R3 


H 12 
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QRDX Bootstrap device initialization -JUL-19 PUBTDRIVR.MAR; 
52 dO 4 5 MOVL #S1, R2 3 Step fla 
8 B4 g CLRW —UDALP(R7) : Poke the controtler’s CSR 
} : Wait 10 seconds 
9 240 TIME: TIMEDWAIT TIME=#1000#1000 - - Wait for 10 seconds 
9 3% INS1=<MOVW YbAsA(R7’ R4>,- ; Check the status register 
9 jWegacetss $>,.- ;: Bit 15 set is the error indicator 
} INS =<BBS R2,R4,258>,~ Done with this step? 
= - Ladoe or ex ng wa oo 
0D 50 «EB dae BLBS Ser ; Br } not timed Sut 
BD 58 =FS BF ERROR: SOBGTR R8,RETRY ; Try once again 
50 2004 &F zt ; MOVZWL #S$$_DEVINACT,RO : Set Tollurt stetus 
80000000 3 i VALID: .LONG %x80000000 3 Sign bit set 
54 65 6 C 26$: TSTW RG ; Check status register for error 
EF 19 3 6 BLSS ERROR ; Br if error 
02 A7 83 2B 30$: MOVW (R3)+, UDASA(R7) ; Send the controller the next step 
B1 52 OF F AOBLEQ #S4,R2,TIME : Set for next step 


> Initialization complete. Write the packet address in the ring. 
; Writing the addresses must be deffered until this point because the 
; hardware zeroes the entire ring as a memory write check. 


00000040'8F (C1 ADDL3 #<RSPPKT-RING>,- 
60°AF  52°AF B*INTTBL+2,B°RD ; Response packet 
‘ ¢ ADDL3 S*#<CMDPKT-RING>,- 


64°AF 52°AF B* INTTBL+2,B8°CD : Command packet 


BSBB + CONTROLLER_CHARS ; Set controller characteristics 
BLBC RO,50$ ; Exit if error 


=~ 


=O OU 9 OD NA NEA SO OD NA MNES OD NAME WWD $$ O OO NAMES WO NOUS WO OONO 


4D 10 
2750 =«&9 


Now bring the device on-line 


40$: MOVL #1, (R5) ; Set command ref number 
MOVZBL RPBS$W_UNIT(R9) ,4(R5) 3; Put unit number in cmd packet field 
4 AS 9 9A MOVZBL ens thee 4 ONL IN, 8(R5) ; Set opcode to bring drive online 
52 00989680 8F 0 MOVL #<1000071000>,R2 ; Set large wait time 100 secs 
OOF BSBW I 3; Send it out 
OE 5 BLBC RO,50$ ; Br if failure 
50 ; BISB #8,R . nixue success to reflect media type 
OA O1AE "Cf BBC SRSCPSV_UF_RMVBL ,w*RSPPKT+MSCP W_UNT_FLGS,55$ 
0 : ese #16,R 3; Fixup success to reflect removable 
50 0084 $F 3¢ 208: MOVZWL #SS$_DEVOFFLINE,RO ; Change status to unit offline 


1 EF 
0 
O1BC'CF 


EXTZV #MSCPSV_MTYP_D1,- 
#MSCPSS_MTYP_D1,- 
W*RSPPKT+ - 


a I BOOOOO MMW HMMMMMMMMMMMMOCCSCVCTCVTTVCTCTMAMANAOAAO 
== DOO OO0000 09.09 09 0909 09 09 09 SI NINN NN DPR AA OA OD UIT 


OW OOD LSM DOOWOOMOST F999 SF FOO & rym cocococs cp cnc & 


MA QOOOOOOOOCOOOCOSOOSCSOSOSOOOOCSOOoOO 


So 
= 
> 
wi 
> 
oO 
ro 
SOOooooooooooooQoQoQooQooooQooQoooooooooooooo 
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vOe-006 QRDX Bootstrap device initialization i eet 1%: g sf PUBTDRIVR.MAR; . () vi. 
1 11F 1 MSCPSL_MEDIA_ID,R1 3 ey out e y -7 ehoraster 
5151 Ob 78 0120 $1 ASH ABRIL  othen ve in high 
ig EF 1 EXT2V anscpgy sent bb, 
O1BC'CF 1 1 
gf 12A 3 RscPs “REDIA, ID,R2 ; Pull out Ist device character 
51 3340 ef ag 1 3 13 BISW #*X4 ; Make ASCII characters 
FEEG CF OS 1 ad 01 1 BISW3 R1R *DENNAME : Set into driver name 
04 ! : ’ RET 
137 3 3 
i : 3; small routine to use so that the controller characteristics can be set 
137 : 
, 5 SET_CONTROLLER_CHARS: 
55 O16C'CF 9 137 § MOVAB W*CMDPKT,rS ; Get the address of command packet 
oS FF. § 13C¢ 0 MOVL #1, (R5) ; Set command ref number 
04 AS 04 «(O13F 1 CLRL = & (RS) ; No unit 
08 AS 04 A \3¢ § MOVZBL #MSCPSK_OP_STCON,8(R5) ; Set opcode to set controller chars 
o¢ AS 7C 014 CLRQ 15 iR3} ; Clear data area 
14 A5 7C 0149 4 CLRQ 20(R5) : To stop timeouts 
OO9F 31 be ; BRW 10_STANDARD_WAIT ; Send it out and return 
O14 8 -DISABLE ‘ 
00000150 0O14F 9 =<, +1>8- 
15 40 ; 
1 43 ; RINGS 
150 343 : 
tt 15 44 INTTBL: .WORD oo 3 step 1 4 gritere 
sat | a ts 7 “ORD G0 Po crtseth tN Seance sit 
1 47 
0000 8008 13 $8 WORD 0 3; Reserved 
00 15C¢ 49 CMDINT: .WORD 3; Command status word 
0000 186 2 118 -WORD 0 ; Response status word 
0000000 016 57 "LONG «0 ; QBUS address of response ring 
0000000 19 2 cD «LONG 0 ; QBUS address of command ring 
30 188 «WORD 48 ; Length of message 
1 O16A 66 -WORD 1 : ID 
1 16C 65 CMDPKT: .WORD 1 
0000019¢ : ; rt: -BLKW 23 ; Full envelope 
000001A0 019 66 * -BLKW 
9000010 100 6 RSPPKT: .BLKW $, 
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vOe-006 QRDX Bootstrap device Q10 eet 7 1Ri9ti2 PUBTDRIVR MAR: 1 - (4) vi. 
4 -SBTTL QRDX Bootstrap device 010 
76 ;++ 
tt 3 
f : Inputs: 
: R - base address of adapter's register space 
3 R - lon for current piece of transfer 
: R = contains 
3 R - address of the device's CSR 
3 R8 - size of transfer in bytes 
: RS - address of the RPB 
: R10 = starting address of transfer 
92 ; ** R2 - PTE as address for VA in R10 
4 : R11 - LBN at start of transfer 
% ; FUNC(AP)= 1/0 operation (IO$_READLBLK or IO$_WRITELBLK only) 
97 ; SIZEC(AP)= Size of transfer in bytes 
0 > 3 MODE(AP)= Address interpretation mode (0 = physical, 1 = virtual) 
o o : Implicit inputs: 
0 6 ; 
3; Outputs: 
0 : RO - status code 
08 ; SS$_NORMAL - successful transfer 
09 ; SS$_NOSUCHDEV - ynsupper ted device 
: : SS$_CTRLERR - fatal controller error 
12; R3 = must be preserved 


FUNC = 16 
MODE = 20 


UD_DRIVER: ; UDASO device driver. 


eh eet et a 


OO FW 9 OD NAMES UID $9 OD NAME WIN 9 OD NA NE WIN 9 OD NOAM EN SNE OOOO 


: Translate the 1/0 function code into a device-dependent function 
; code for this disk. 


AO AF 21. 90 MOVB  #MSCPSK_OP_READ, - 
CMDPKT+ASCP OP CODE 


cpt FUNC CAP) #108 WRI 


; Assume read 
BLK ; Check for write function 


ce a ce ce cd ce cd cd ce ce ce cee ce ed cd cd a ce ce ce ca ce cd ee cae ce a a cae ae ce eed ceed ee ce a ce ee ee ee ee ee ee ee ed ee ad ea ed ed ee ae ee ed ee eed 
MMMOVCVUOCTCVTCVOVOVCOCVCTCOSCVOOOSOSOSOVOVTOVVUVCTVCTOCVCOVUVOCOVTVOUCOVCTCOVCTVUVCOVCTVTVTVOVTVCVTVTVTVTCTVCTC"C"9O 


POIMM YS COL FLOOSOCCOCOCOCOOCOOOCOOSSSSOOCOOOOOCOOOOOOOO 


Pee ee ee ee ee nen 


4 BNEQ 208 3; No, do rea 
96 AF 2 MOVB #ASCPSK_OP_ WRITE, - : Set write function code 
CMDPKT+ASCP$B gPtone 
A6 AF 5 20$: MOVL RS, CMDPKT+MSCPS$L_LBN ; Set the logical block number 
92 AF 65BCO#OD MOVL RB. CMDPKT¢MSCPSL~BYTE_CNT ; Set the byte count 
92 AF «OSA OD MOVL R10, CMDPKT+MSCP$B_BUFFER ; Set the starting adr of xfer 
92 AF 652~=«COD r MOVL  R2,CMDPKT+MSCP$B_BUFFER+4'; Set the PTE if R10 is VA 


RPBSW_UNIT - RPB field containing boot device unit number 


= QRDX BOOT DRIVER 
QRDX Bootstrap device Q10 


ct) 10. sping WAIT: 
52 ogy sess 8F #< 1000810002 Re 
4 4 UDASA(R7),R 


= 
= 
we 
_ 
Oo 


-—-o— mpm -Owrr-ao 


Nw "OOO 


Ow 
Vin 


:; Error occured during transfer. 


PAA AMMA & & & a OOO TM TH 
MOOOOOOOOMIMIMIMIMIIMIWI OTE IOS PININVINVIO€: ON OvITMm 


WR SO ODNOAOU EWN OU EWN OO NOME WO OONG 


COC 6909 SI NIN INNS SN PA AAO OO III II 


CGOOOCCOCOCOOCOCOOOOOOOOOOOoOO 


" MOVZWL #SS$_CTRLERR,RO 
RSB 


Ow 
Mr 
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Set minimum wait time 
Controller or ne? 

Yep, error 

S ; “controtter ownership 


Telt “contret ter to read 
ay problems? 


c until ready 


1 " B tree: out 
troller ownshi 


OWN, RD+2 
#MSCPSV ST MASK ,AMSCPS$S ips RSPPKT MSC SU, STATUS ,RO 


drive errors? 
| bee if n 


; Invalid. command? 


; Br if no, ignore invalid command 
; which is caused by multiple onlines 


; Transfer is complete. Return with success status code. 
MOVZWL #SS$_NORMAL ,RO 
RSB 


: SET Soret Ah CODE 
AND RETU 


Return and retry. 


Set failure status 
Return to BOOTDRIVR 


rar 


0090 

9A 

FFOE CF 
57 58 AY Ht 
82. 


0000026D 


Oooooco 


PAAR AAA AAI 


= QRDX BOOT DRIVER 
QRDX Bootstrap device disconnect 


ST9O09F POW 2S TT no 


~s 


MRR PS SP SH SH KH DOO OOOOCOCOCOCOOOOOVOOO®W 
ARO ODNA NE WWN 0 OD NOU EWI 0 OOO ES Wr O 


++ 
It sends an AVAIL packet to the 


dismount of the eystee afetety ‘ 


RO = status code 


UD_DISC: 
-ENABLE LSB 
WORD “M<R4,R7> 
MOVZBL #MSCPSK_OP_AVAIL,- 
RPB$L_CSRVIR(RI),R 
10_STANDARD_WAIT 
UD_DRVSIZ=.-START 


«END 


Praue=t9be 1ST 


-SBTTL QRDX Bootstrap device disconnect 


yp Be BUGCHEC anor 
umes virtual mapping turned on. 
Inputs: 
R9 ==> RPB 
Outputs: 


CMDPKT?MSCP$B OPCODE 


———_——— 


VAX/VMS Recre yos-00 Page (3 


PUBTDRIVR.MAR 


This routine disconnect the boot Govteg efter a bugcheck dump. 
roller, 
s designed to be 
ter the dump has finished. 


in effect coing a 
alle 


3; Make drive AVAILable 


; Get correct address of device CSR 
3; Send it out 


ve 
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4:3 
1 ig 
= 00000000 R SET LLER_CHARS 
x SS$ ® 
¥ $$$ CT 
SS$_ LINE 
$$$ 
STAR 
TIME 
UDAI 
UDAS 
UD_DISC 
UD"DRIVER 
UD-“DRVSIZ = 
UD" INIT 
VASS_VP : 
VP 2 
ALI6 
0 
00 
38 
0 
00 
000 
000 
Bee 
00 


Macro y04=00 
R.MAR; 


03 


Vv 


rtrrkeeee 


— ad 
POO L—rom— 


Zwzwer vu HZ090NFO 
“uu 


DEVNAME 
DSKDRVNAME 
ERROR 
ERROR1 
FUNC 

GO 

INTTBL 


10$_WRITELBLK 
10_ STANDARD_WAIT 
MOBE 


MSCP$B_BUFFER 
MSCP$B_OPCODE 


Oooo 


oo 
mn 
zz rm 
" 


Ss 


OOOO GCCOOCOCSOOOCOOOSCOOOCOOOOOOOOOOOOO 


SsSsssssssssasssss 


za zDD 
oO 
Www 
= 
v 
< 
mn 
par 


STABLE 
a AL_VECTOR eeeeeeee 


o 

w 

= 
wow 
bl el 
‘ 

= 

r 

cal 


VMBSL— 
VMBSO-F 
vMB$Q 


VMB$Q~ 
VMBSV~ 


OOOoooo°oe-3o—— 
oooooooo 


OoOoooooooooo 
OoOoooo[oo 


CoOooo 


QO @ 

2S 5 

oo 

vU-—- Pee 

xz rc 

4 ‘68 
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Psect synopsis 


PSECT name 


Phase Page faults CPU Time E 

Initialization 14 00: 8:00.07 08: :0 

zounend processing 70 00:00:00.57 0:0 

- mb { table sort ~ 00:00:03.9 00: z 
mbo e sor :00:02. 

Pass 2 ? $0:00:03:78 00:0 
Sesbot table output 1 8988: 0.11 838 
Psect synopsis output 00: 8: 3-0 :0 
Cross-reference output ° Bo 8 :00.0 38 
Assembler run totals 53 0:00:20.71 0:0 


The york ing set Limit was 1350 pages. 
86032 bytes (169 pages) of virtua 
There were 90 
523 source lines were read in Pass 1, producing 1 
pages of virtual memory were used to define 21 macros. 


Macro Library name 


DISKSSTARWORK 3 SANACie UV1ROM. VMSJLIBUV1.M 7 
Bisteclaney RKOS UV1ROM 1 eee MLB; 4 
SYSS$SYSROOT: ESYSLIBISTARLEY. MLB; 7 
TOTALS (all libraries) 18 


1717 GETS were required to define 18 macros. 


There were no errors, warnings or information messages. 
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Attributes 


NOPIC 
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Tre 


10194 


pages of symbol table space ah eeeioe to hold 1567 
6 object records in Pass 


10-AUG=19 
~JUL-1984 


CON 
CON 
CON 
CON 


memory were used to buffer the intermediate code. 


Be F:3ti2 


ABS 


LCL NOSHR NOEXE 
LCL NOSHR EXE 
LCL NOSHR’ EXE 
LCL NOSHR EXE 


non-local and 17 Local symbols. 


Poweeeecooewececoeeeseoosce$ 


MAC/LIS=L1IS$:PQBTDRIVR/OBJ=0BJ$:PQBTDRIVR VMS$:BOOUV1SWT+VMS$:PUBTDRIVR+OBJ$: VMB/LIB+VMS$:LIBUV1/LIB 


VAX/VMS Macro , ¥04-00 
PUBTDRIVR.MAR; 
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